home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue54 / Persist / FEditEAddress.dfm < prev    next >
Encoding:
Text File  |  2000-01-07  |  1.4 KB  |  67 lines
  1. object FormEditEAddress: TFormEditEAddress
  2.   Left = 391
  3.   Top = 351
  4.   BorderIcons = []
  5.   BorderStyle = bsDialog
  6.   Caption = ' Edit Phone, Fax, etc address'
  7.   ClientHeight = 108
  8.   ClientWidth = 303
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   Position = poScreenCenter
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Label1: TLabel
  20.     Left = 8
  21.     Top = 16
  22.     Width = 65
  23.     Height = 13
  24.     Caption = 'Address &Type'
  25.     FocusControl = cbAddressType
  26.   end
  27.   object Label2: TLabel
  28.     Left = 12
  29.     Top = 48
  30.     Width = 38
  31.     Height = 13
  32.     Caption = '&Address'
  33.     FocusControl = eAddress
  34.   end
  35.   object cbAddressType: TComboBox
  36.     Left = 96
  37.     Top = 12
  38.     Width = 197
  39.     Height = 21
  40.     Style = csDropDownList
  41.     ItemHeight = 13
  42.     TabOrder = 0
  43.     Items.Strings = (
  44.       'Phone: Home'
  45.       'Phone: Work'
  46.       'Phone: Fax'
  47.       'Phone: Mobile'
  48.       'EMail'
  49.       'Web')
  50.   end
  51.   object eAddress: TEdit
  52.     Left = 96
  53.     Top = 44
  54.     Width = 197
  55.     Height = 21
  56.     TabOrder = 1
  57.   end
  58.   object tiButtonPanel1: TtiButtonPanel
  59.     Left = 0
  60.     Top = 77
  61.     Width = 303
  62.     Height = 31
  63.     OnBtn1Click = tiButtonPanel1Btn1Click
  64.     OnBtn2Click = tiButtonPanel1Btn2Click
  65.   end
  66. end
  67.